#pragma once
#include <iostream>
#include <cstring>
#include <cerrno>
#include <string>
#include <functional>
#include <unordered_map>

#include <signal.h>
#include <strings.h>
#include <wait.h>
#include <unistd.h>
#include <pthread.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/types.h>
#include <sys/socket.h>

#include "nocopy.hpp"
#include "Log.hpp"
#include "InetAddr.hpp"
#include "InetAddr.hpp"
#include "LockGuard.hpp"
#include "Comm.hpp"
#include "ThreadPool.hpp"
// #include "Task.hpp"

using namespace std;

const static int default_black_log = 5;
using task_t = function<void()>;
using callback_t = function<void(int, InetAddr &)>;

class Tcp_Server;

// class ThreadData
// {
// public:
//     ThreadData(int sock, Tcp_Server *ptr, struct sockaddr_in &peer)
//         : sockfd(sock), svr_ptr(ptr), addr(peer)
//     {
//     }
//     int SockFd()
//     {
//         return sockfd;
//     }

//     Tcp_Server *GetServer()
//     {
//         return svr_ptr;
//     }

//     ~ThreadData()
//     {
//         close(sockfd);
//     }

// private:
//     int sockfd;
//     Tcp_Server *svr_ptr;

// public:
//     InetAddr addr;
// };

class Tcp_Server : public nocopy
{
public:
    Tcp_Server(uint16_t port, bool isrunning = false)
        : _port(port), _isrunning(isrunning)
    {
    }

    void Init()
    {
        // 创建套接字
        _listensock = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensock < 0)
        {
            lg.LogMessage(Fatal, "socket err, %d : %s", errno, strerror(errno));
            exit(Socket_Err);
        }
        lg.LogMessage(Info, "create socker success, sockfd: %d ... ", _listensock);

        // 固定写法
        int opt = 1;
        setsockopt(_listensock, SOL_SOCKET, SO_REUSEADDR | SO_REUSEPORT, &opt, sizeof(opt));

        // 绑定，指定网络信息
        struct sockaddr_in local;
        memset(&local, 0, sizeof(local));
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = htonl(INADDR_ANY);

        // bind
        if (bind(_listensock, CONV(&local), sizeof(local)) != 0)
        {
            lg.LogMessage(Fatal, "bind socket err, %d : %s", errno, strerror(errno));
            exit(Bind_Err);
        }
        lg.LogMessage(Debug, "bind socket success, sockfd: %d ... ", _listensock);

        // 监听 listen
        if (listen(_listensock, default_black_log) != 0)
        {
            lg.LogMessage(Fatal, "listen socket err, %d : %s", errno, strerror(errno));
            exit(Listen_Err);
        }
        lg.LogMessage(Debug, "listen socket success, sockfd: %d ... ", _listensock);

        ThreadNs::ThreadPool<task_t>::GetInstance()->Start();
        funcs.insert(make_pair("defaultService", bind(&Tcp_Server::DefaultService, this, placeholders::_1, placeholders::_2)));
    }

    // 通过read, write来进行数据的读写
    // void Service(int sockfd)
    // {
    //     char buffer[1024];
    //     while(true)
    //     {
    //         ssize_t n = read(sockfd, buffer, sizeof(buffer));
    //         if(n > 0)
    //         {
    //             buffer[n] = 0;
    //             cout << "client say# " << buffer << endl;

    //             string echo_string = "server echo# ";
    //             echo_string += buffer;
    //             write(sockfd, echo_string.c_str(), echo_string.size());
    //         }
    //         else if (n == 0)
    //         {
    //             lg.LogMessage(Info, "client quite ... \n");
    //             break;
    //         }
    //         else
    //         {
    //             lg.LogMessage(Error, "read socket err, %d : %s", errno, strerror(errno));
    //             break;
    //         }
    //     }
    // }

    void Service(int sockfd, InetAddr &addr)
    {
        char buffer[1024];
        while (true)
        {
            ssize_t n = read(sockfd, buffer, sizeof(buffer));
            if (n > 0)
            {
                buffer[n] = 0;
                cout << addr.PrintDebug() << "# " << buffer << endl;

                string echo_string = "server echo# ";
                echo_string += buffer;
                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if (n == 0)
            {
                lg.LogMessage(Info, "client quite ... \n");
                break;
            }
            else
            {
                lg.LogMessage(Error, "read socket err, %d : %s", errno, strerror(errno));
                break;
            }
        }
    }

    // static void *HandlerRequest(void *args)
    // {
    //     pthread_detach(pthread_self());
    //     ThreadData *td = static_cast<ThreadData *>(args);

    //     td->GetServer()->Service(td->SockFd(), td->addr);

    //     delete td;
    //     return nullptr;
    // }

    void Start()
    {
        _isrunning = true;
        // signal(SIGCHLD, SIG_IGN);
        while (_isrunning)
        {
            // 获取连接
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = accept(_listensock, CONV(&peer), &len);
            if (sockfd < 0)
            {
                lg.LogMessage(Fatal, "accept socket err, %d : %s", errno, strerror(errno));
                continue;
            }
            lg.LogMessage(Debug, "accept socket success, sockfd: %d ... ", sockfd);

            // 提供服务
            // v1
            // Service(sockfd);
            // close(sockfd);

            // v2 多进程
            // pid_t id = fork();
            // if(id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if(id == 0)
            // {
            //     close(_listensock);
            //     if(fork() > 0)  exit(0);

            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            //     pid_t pid = waitpid(id, nullptr, 0);
            //     if(pid == id)
            //     {
            //         // to do
            //     }
            // }
            // v2 多进程 -> 信号版
            // pid_t id = fork();
            // if(id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if(id == 0)
            // {
            //     // child
            //     close(_listensock);
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            // }
            // v3 进程池 。。。。。。
            // v4 多线程
            // ThreadData td(sockfd, this, peer);
            // pthread_t tid;
            // pthread_create(&tid, nullptr, HandlerRequest, &td);
            // 主线程和新线程不需要关闭所谓的文件描述符, 将线程设置成分离即可
            // pthread_join(tid);
            // v5 线程池
            InetAddr addr(peer);
            task_t t = bind(&Tcp_Server::Routine, this, sockfd, addr);
            ThreadNs::ThreadPool<task_t>::GetInstance()->Push(t);

        }
    }

    string Read(int sockfd)
    {
        char type[1024];
        ssize_t n = read(sockfd, type, sizeof(type) - 1);
        if (n > 0)
        {
            type[n] = 0;
        }
        else if (n == 0)
        {
            lg.LogMessage(Info, "client quite ... \n");
        }
        else
        {
            lg.LogMessage(Error, "read socket err, %d : %s", errno, strerror(errno));
        }

        return type;
    }

    void Routine(int sockfd, InetAddr addr)
    {
        funcs["defaultService"](sockfd, addr);
        string type = Read(sockfd);
        // lg.LogMessage(Debug, "%s select %s, fd: %d \n", addr.PrintDebug().c_str(), type.c_str(), sockfd);

        if(type == "ping") funcs[type](sockfd, addr);
        else if(type == "translate") funcs[type](sockfd, addr);
        else if(type == "transform") funcs[type](sockfd, addr);
        
        else {}

        close(sockfd);
    }

    void DefaultService(int sockfd, InetAddr &addr)
    {
        (void) addr;
        string server_list = "|";
        for(auto func : funcs)
        {
            server_list += func.first;
            server_list += " | ";
        }
        
        write(sockfd, server_list.c_str(), server_list.size());
    }

    void RigisterFunc(const string &name, callback_t func)
    {
        funcs[name] = func;
    }

    ~Tcp_Server()
    {
    }

private:
    uint16_t _port;
    int _listensock;
    bool _isrunning;
    unordered_map<string, callback_t> funcs;
};